#define _CRT_SECURE_NO_WARNINGS 1

#include "SList.h"


Listnode* Listapply(Listdatatype x)
{
	Listnode* newnode = (Listnode*)malloc(sizeof(Listnode));
	if (newnode == NULL)
	{
		perror("malloc");
		exit(1);
	}
	newnode->data = x;
	newnode->next = NULL;

	return newnode;
}

void Listprint(Listnode* phead)
{
	Listnode* pcur = phead;

	while (pcur)
	{
		printf("%d->", pcur->data);
		pcur = pcur->next;
	}
	printf("NULL\n");
}

void Listpushback(Listnode** pphead, Listdatatype x)
{
	assert(pphead);
	Listnode* newnode = Listapply(x);
	if (*pphead == NULL)
	{
		*pphead = newnode;
	}
	else
	{
		Listnode* pcur = *pphead;
		while (pcur->next)
		{
			pcur = pcur->next;
		}
		pcur->next = newnode;
	}
}

void Listpushfront(Listnode** pphead, Listdatatype x)
{
	assert(pphead);
	Listnode* newnode = Listapply(x);

	newnode->next = *pphead;
	*pphead = newnode;
}

Listnode* Listfind(Listnode* phead, Listdatatype x)
{
	assert(phead);
	Listnode* pcur = phead;

	while (pcur)
	{
		if (pcur->data == x)
			return pcur;
		pcur = pcur->next;
	}
	return NULL;
}

void Listinsertfront(Listnode** pphead, Listnode* pos, Listdatatype x)
{
	assert(pphead);
	assert(*pphead);
	assert(pos);

	Listnode* newnode = Listapply(x);
	Listnode* pcur = *pphead;
	Listnode* prev = *pphead;
	if (*pphead == pos)
	{
		Listpushfront(pphead, x);
	}
	else
	{
		while (pcur != pos)
		{
			prev = pcur;
			pcur = pcur->next;
		}
		newnode->next = pcur;
		prev->next = newnode;
	}
}

void Listinsertback(Listnode* pos, Listdatatype x)
{
	assert(pos);
	Listnode* newnode = Listapply(x);

	newnode->next = pos->next;
	pos->next = newnode;
}

void Listpopback(Listnode** pphead)
{
	assert(pphead);
	assert(*pphead);

	Listnode* pcur = *pphead;
	if (pcur->next == NULL)
	{
		free(pcur);
		pcur = NULL;
		*pphead = NULL;
	}
	else
	{
		Listnode* prev = *pphead;
		while (pcur->next)
		{
			prev = pcur;
			pcur = pcur->next;
		}
		free(pcur);
		pcur = NULL;
		prev->next = NULL;
	}
}

void Listpopfront(Listnode** pphead)
{
	assert(pphead);
	assert(*pphead);

	Listnode* pcur = *pphead;
	if (pcur->next == NULL)
	{
		free(pcur);
		pcur = NULL;
		*pphead = NULL;
	}
	else
	{
		pcur = pcur->next;
		free(*pphead);
		*pphead = pcur;
	}
}

void Listdelete(Listnode** pphead, Listnode* pos)
{
	assert(pphead);
	assert(*pphead);
	assert(pos);

	Listnode* pcur = *pphead;
	Listnode* prev = *pphead;

	if (*pphead == pos)
	{
		pcur = pcur->next;
		free(*pphead);
		*pphead = pcur;
	}
	else
	{
		while (pcur != pos)
		{
			prev = pcur;
			pcur = pcur->next;
		}
		prev->next = pcur->next;
		free(pcur);
		pcur = NULL;
	}
}

void Listchange(Listnode* pos, Listdatatype x)
{
	assert(pos);
	pos->data = x;
}